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Prefácio 


Muitas vezes, já se tendo adquirido razoá- 
vel conhecimento de Basic, torna - se tedio 
so e enfadonho utilizar-se de cursos com 
pletos, para desvendar os segredos destas 
ou daquelas instruções ou funções do Basic 
Sinclair que nos fogem ao controle. 


Colocã-las em ordem alfabética, foi a melhor 
solução para consultas rápidas e esparsas, 
não sendo recomendado como forma de estudo. 





Para tanto, dividi, resumidamente, o Basic 
Sinclair, nas primeiras páginas deste volu 
me, de forma a esclarecer todas as instru- 
ções, comandos, funções e operadores que es 
tão disponíveis aos usuários. 


Como não poderia deixar de ser,acrescentei 
ainda, a este volume os capítulos : Conver 
tendo outros Basics, Contando os Bytes e E 
conomizando Memória. 


Delio Santos Lima 

Caixa Postal 100 

12.200 São José dos Campos 
SP - Brasil 
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O que é Basic Sinclair 


Desde agosto de 1982, este autor vem empre 
gando os termos "Basic Sinclair" e "Logica 
Sinclair", 


Muito polemizados, cabe aqui definí-los. 


Entende-se por "Basic Sinclair! a linguagem 
Basic desenvolvida pela Sinclair Research 
Ltd. em suas versões de 4K e BKROM, para os 
microcomputadores ZXB0 e ZX8B1. 


Qualquer outra versão de Basic, cujos co- 
mandos, instruções , funções, operadores e 
caracteres forem idênticos a esta, tal que 
os programas de uma maquina possam ser ro 
dados em outra, sem qualquer alteração , é 
tida como "COMPATÍVEL" ou a "MESMA", 


Jã o termo "Logica Sinclair" especifica os 
circuitos lógicos característicos ao uso do 
Basic Sinclair em 4 ou BK ROM. 


Compatibilidade de Soft 


Muito tem-se falado de compatibilidade.Compatiblida 
de de software não existe.É decorrente da compatibi 
lidade de micros. E compatibilidade total também 1- 
nexiste. Se é inteiramente compatível é o mesmo,é a 
mesma coisa. 


São compatíveis ao Sinclair ZX80 SKROM os seguintes 
micros nacionais: NEZ8000, TK82C, TKB3, TKB5S,CP200, 
RINGO e AS1000. 


Nos mícros acima, destacam-se as seguintes diferenças: 
- Os NEZB000 e alguns TK82C não possuem SLOM. 


- O TKB5 possui 2K de ROM adicionais, com funções pa 
ra gravação de programas em alta velocidade (High 
Speed) e de dado 








« Também existe CP200, ver. High-Speed, como o 
TK85, porém com velocidade diferente. 


* O RINGO possui teclas multi-fun 
mentos e grava programa 
aos demais, impo 
ções em outros. 





e outros incre 
em velocidade superior 
ibilitando o uso de suas grava 











No início citei estas máquinas como reproduç do 
ZX80-BKROM e não do ZX81, pois o ZXB1 é uma versão 
integrada em mais larga escala do ZXB0.Utiliíza um ú 
nico chiplcircuito integrado), produzido exclusívamen 
te por projeto e para a Sinclair Research,em substi 
tuição a mais de 20 circuitos integrados existent 
no ZX80 e suas versões nacionais. 








Obs.: Alguns TKs foram produzidos com este chíp,o 
famoso SCL - Sinclair Computer Logic. 


O Basic Sinclair 
O Basic Sinclair divide-se em: 


INSTRUÇÕES DE PROGRAMA 
(com nº de linha) 


KEYwOROS INSTRUÇÕES 
E | PALAVRAS-CHAVE COMANDOS 
« (sem nº de Linha) 
Er) 
o 
z FUNÇÕES 
fo 
(0) 
OPERADORES 
o 
n 
(0) 
s ALFANUMÉRICOS 
CARACTERES PONTUAÇÃO 
GRÁFICOS e de 
CONTROLE 
KEYWORDS: 


Palavras-chave são as instruções, funções e 
alguns operadores que usam mais de um carac 
tere, como , por exemplo, AND, OR, NOT e 
são acionados por uma só tecla. 


As Instruções 


OS COMANDOS (commands) 


Tendo-se um programa, para rodá-lo é pre- 
ciso ordenar ao sistema , para que o faça, 
i.e. , para que RODE. Esta “ordem, outins 
trução" dada ao computador, em termos de 
linguagem de programação, é um COMANDO, no 
caso, o comando RUN. 


COMANDO é uma instrução sem numero de linha. 


INSTRUÇÕES (statements) 


São as linhas do programa. Uma instrução 
do programa compõe-se de número de linha, 
instrução e elementos variáveis. 


O termo "instrução" causa uma certa confu 
são, uma vez que no original inglês temos 
STATEMENT , como linha de programa e 
INSTRUCTION e ambos os termos tem sido tra 
duzidos como INSTRUÇÃO. 


No basic Sinclair todas as instruções po- 
dem ser usadas sem número de linha , como 
comando direto, excluindo-se INPUT. Contu 
do, algumas instruções não admitem número 
de linha, sendo apenas utilizáveis como 
COMANDO DIRETO, como por exemplo, EDIT 
DELETE, BREAK, etc. ... 
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AS INSTRUÇÕES DIVIDEM-SE EM: 


DE EDIÇÃO (COMANDOS) 
corr, À + + DELETE OU RUBOUT NEW LINE OU ENTER 


COMANDOS DO SISTEMA 
LOAD, SAVE, RUN, CLEAR, NEW, STOP, CONT, FAST, SLOW , 


NEW LINE LIST, LLIST 
DE INPUT/OUTPUT 


INPUT, INKEY$, PRINT, PRINT AT, PRINT TAB N, SCROLL, 
CLS, PLOT N,N, UNPLOT, LPRINT, TAB N;, COPY 


DE CONTROLE 
PAUSE N, DIM, RAND, GOTO, GOSUB, RETURN, IF ... THEN, 
TO, NEXT, LET, STEP,FOR 


AUXILIARES 
POKE, PEEK, REM, USR 
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As Funções 


FUNÇÃO é uma relação matemática entre du 
as variáveis X e Y, tal que, para cada va 
lor de X corresponda um único valor de Y. 
Ou, em outras palavras, uma função fornece 
sempre um certo resultado, para um certo 
argumento. O argumento de uma função pode 
ser um número, uma variável, ou uma expres 
são. No caso de expressão, deve vir entre 
parênteses. 


DIVISÃO DAS FUNÇÕES DO BASIC SINCLAIR: 


MATEMÁTICAS 
ABS, EXP, INT, LN, SQR, PI, SGN 


TRIGONOMÉTRICAS 
SIN, COS, TAN, ACS, ASN, ATN 


MANIPULAÇÃO DE STRINGS 
FUNÇÕES CHR$, CODE, LEN, VAL, STR$ 


PRINTING 
AT, TAB 


ESPECIAIS 
PEEK, USR, RNO 
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Os Operadores 


OPERADORES executam as operações aritméti 
cas, relacionais e lógicas entre números , 
expressões ou strings. 


Os operadores dividem-se em: 
ARITMÉTICOS 
to +, LA é 


OPERADORES RELACIONAIS 


DC D=<>+ " 


Lógicos 
AND, OR, NOT 
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Os Caracteres 


Os caracteres dividem-se em: 


ALFANUMÉRICOS 
DeDaVedeAaz 


GRÁFICOS 

20 gráficos mais o inverso dos 

alfanuméricos e de pontuação. 
CARACTERES 


PONTUAÇÃO 


é do RR 


CONTROLE ( de impressão) 
são os de pontuação , e ; 
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SIUOMAIA 


ABS 


Absolute value. É uma função. Fornece o va 
lor absoluto ou módulo de um número. Por e 
xemplo: 


PRINT ABS-2 resulta em 2,€ 
PRINT ABS+2 também resulta em 2. 


Verifique com o programa: 


10 PRINT "x", "ABS X" 
20 FOR X=-3 TO 3 

30 PRINT X, ABS X 
40 NEXT X 


Que resultará: 


x ABS 
-3 
-2 
-1 

) 


vnrsrno 


1 
2 
3 
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ACS 


ARCCOS 


é o mesmo que ACS. É uma função. For 


nece o ângulo em radianos, a partir do cos- 


seno 


Programa para plotar a função ARCCOS : 


10 
20 
30 
40 
50 


LET A=-1 

FOR N=3 TO 42 

PLOT N, INT(ARCCOS(A)410) 
LET A=A+0.45 

NEXT N 


Observação: 


184 graus = PI radianos 
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AND 


AND é um operador lógico. Forma uma compa 
ração lógica entre números, expressões ou 
strings. Permite ainda combinar instruções 
condicionais oferecendo possibilidades de 
decisões mais complexas. 


O valor lógico de uma expressão é interpre 
tado somente com duas possibilidades: 


VERDADE = 1 = expressão de valor * 9 
FALSO =0=expressão de valor = 9 


Combinando-se duas expressões denominadas 
AeB por lógica AND, teremos os seguintes 
resultados, em função das condições de A e B. 


A B A AND B 
F F F 
F v F 
v F F 
v v v 


O operador lógico AND pode ser usado de ai 
ferentes formas. São elas: 


Exemplo A: 


10 IF X=1 AND Y=9.5 THEN PRINT"UM E MEI 
or 
Obriga que duas condições sejam satisfei 
tas, simultaneamente, X e Y. 
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Exemplo B: 
10 LET X=1AND Y 
É o mesmo que: 


10 LET X=1 
20 IF Y=Q0 THEN LET Xx=0 


A sentença matemática (1 AND Y) significa 
que,se Y for O, a mesma resulta em OD. Caso 
contrário,assume o valor do primeiro ope 
rando, neste caso o valor 1. 

Isto ocorre, porque o operador AND trata o 
segundo operando, como se fosse um valor ló 
gico do tipo O ou 1, respectivamente, verda 
deiro ou falso. Se for O é falso. Se não 
for O, é verdadeiro. 


Exemplo C: 
10 LET X$=Y$ AND A 


Como no exemplo anterior, se o segundo ope 
rando for OD, a expressão assume o valor OD, 
ou o mesmo que X$=""., Caso o segundo ope 
rando não seja O, X$ será igual a Y$. 


Exemplo D: 


90 LET Y=Y+( INKEY$="M")-(INKEY$=" Nº) 


Equivale a: 
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90 IF INKEY$="M” THEN LET Y=Y+1 
95 IF INKEY$="N" THEN LET Y=Y-1 


Durante a execução da linha de programa aci 
ma, se as teclas M e N não forem pressiona 
das, as sentenças matemáticas entre parên 
teses tornam-se falsas e assumem o valor 9, 
ficando Y inalterado. 

Caso uma das teclas, M ou N, seja pressio 
nada, uma das sentenças será verdadeira e o 
valor de Y será Y=Y+1 ou Y=Y-1, conforme o 
caso. 


Observação: 


Os operadores lógicos do Basic Sinclair 
tratam somente o segundo operando, como um 
valor lógico. 
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ASN 


ASN é o mesmo que ARCSIN. É uma função. For 
nece o ângulo em radianos, a partir do se 
no. 


Programa para plotar a função ARCSIN 


10 LET A=- 

20 FOR N=3 TO 42 

30 PLOT N, INT(ARCSIN(A)210) 
40 LET A=A+G.65 

50 NEXT N 


Observação : 


189 graus = PI radianos 
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AT 


AT é uma função de impressão. Deve ser usa 
da com a instrução PRINT ou LPRINT. Serve 
para deslocar a posição de impressão para 
qualquer linha ou coluna da tela, indo de 
PRINT AT 0,9 ; a PRINT AT 21,31; 


Pode ser usado nas formas: 

a. Diretamente a seguir de PRINT: 
PRINT AT X,Y; "XYZKL” ou 

b. Precedida de outros PRINT e AT: 


PRINT “KGB"; AT 10,0 ; "CIA"; AT 20,0 ; 
vsNIM 


Exemplo: 





PRINT AT 21,30 ; "Ok" 


Irã imprimir OK, na vigésima segunda  1i- 
nha e na trigésima prímeira coluna. 


Obs.: LPRINT AT interpreta apenas a colu 
na , uma vez que a impressora não re 
trocede o papel. 


Veja PRINT, LPRINT e TAB. 
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ATN 


ATN é o mesmo que ARCTAN. É uma função. For 
nece o ângulo em radianos, a partir da TAN. 


Programa para plotar a função ARCTAN. 


10 LET A=-2 

20 FOR N=4 TO 59 

30 PLOT N, INT(ARCTAN(A)210+20) 
40 LET A=A+9.1 

50 NEXT N 





Observação : 


189 graus =PI radianos 
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BREAK 


Break significa interromper. É uma instru 
ção e só pode ser usada como comando dire 
to (sem número de linha). 


A tecla de BREAK é a mesma de SPACE.Quando 
o micro está em RUN,ela funciona como BREAK, 
interrompendo a execução com o codigo de 
reportagem D/9 . No modo EDIT, ou durante 
as instruções INPUT, funciona como SPACE. 


Para interromper a execução do programa du 
rante as instruções INPUT, usa-se STOP. 

Durante INPUT (string), o cursor estará na 
forma" 1". É preciso que se apague uma das 
aspas para que o comando STOP surta efeito. 


Observação: 


Comando é uma instrução a qual não faz par 
te de um programa. 


Veja o capítulo"Instruções e Comandos". 
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CHR$ 


É uma função. Fornece o caractere ou pala 
vra chave de código N. A codificação empre 
gada é própria dos sistemas Sinclair. 


Programa para listar os caracteres e pala 
vras chave: 


19 SLOW 

20 FOR N=0 TO 255 

30 PRINT AT 20,0;N,CHR$ N 
40 SCROLL 

50 NEXT N 


Observação : 


O código do sinal de interrogação (?) é 15. 
Os demais códigos que se apresentarem com 
uma interrogação não são usados ou repre 
sentam palavras chave não imprimíveis, co 
mo EDIT ou New Line. 
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CLEAR 


Clear é uma instrução. Apaga todas as va 
riáveis. Não significa igualá-las a O, mas 
que ficam indefinidas. 


Experimente como comando direto: 


LET X$="TESTE” 
PRINT x$ 

CLEAR 

PRINT Xx$ 


CLEAR não afeta o programa, apenas as va 
riáveis. 


Veja RUN, 
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CLs 


É uma instrução. Limpa a memória de vídeo, 
(Display File). Não afeta o programa e as 
variáveis. 


Experimente: 


19 SLOoW 

20 FOR N=1 TO 29 

30 PRINT AT 20,0;"SUMINDO" 
49 SCROLL 

50 NEXT N 

69 CLS 


Quando a memória em uso estiver quase no 
limite, as últimas linhas da listagem não 
serão mais apresentadas no vídeo e pode 9 
correr que a linha em edição não seja acei 
ta por New Line. Apague-a e,a seguir, digi 
te CLS. Sem nenhuma listagem no vídeo, a no 
va linha será "editada". 


A razão disto é que,após a aplicação de CLS, 
surgiram alguns bytes de memória disponií 
vel, provenientes do D.File. 


veja"A Memória de Vídeo",na instrução PRINT. 
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CODE 


É uma função para a manipulação de string. 
O argumento deve ser uma string. CODE for 


nece 


o código númerico de um caractere,pa 


lavra chave,ou de um certo caractere de u 
ma string. 


Pode 


CODE 


CODE 


CODE 


CODE 


CODE 


ser usado nas formas: 


x ifornece o código do caractere X, 
ou do solicitado. 

“"ABC"ifornece o código do primeiro ca 
ractere da string "ABC". 

x$ :ifornece o código do primeiro ou 
do único caractere da string X$. 

x$(5):fornece o código do quinto ca 
ractere da string X$, ouodo so 
licitado. 


irá sempre retornar um número entre O 


e 255, excluindo-se os casos de erro. 


Veja 


CHR$. 
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É uma instrução. CONT faz o programa conti 
nuar, apos ter sido parado por STOP. 


Se o programa parou por erro, sendo o codi 
go de reportagem é de 9/ ou D/, ele não 
continuará por CONT, ocorrendo novo erro. 
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COPY 


É uma instrução. Copia exatamente o que es 
tiver no vídeo, para a impressora. É a ins 
trução de impressão mais utilizada, permi 
tindo inclusive a cópia de gráficos, resul 
tados mostrados no vídeo ou mesmo das lis 
tagens. 


Quando a instrução COPY é acionada, desde 
que exista impressora acoplada ao micro, a 
mesma reproduzirá uma tela completa de vin 
te e duas linhas com trinta e dois caracte 
res cada, ainda que estes sejam espaços.Ca 
so não exista impressora acoplada, podem o 
correr duas coisas: 
1. Nada 
trução seguinte, ou 
2. A "tela ficar branca", Neste caso di 
gite BREAK para retornar. 


continuando o programa na ins 





Veja LPRINT e LLIST. 
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cos 


É uma função. Fornece o cosseno do ângulo 
dado, em radianos. 


A seguir,programa para plotar a função cos 
seno: 


10 FOR N=0 TO 6 STEP 9,1 
20 PLOT Nx10+2, INT(COS(N)x10+20) 
30 NEXT N 


Observação: 


189 graus = PI radianos. 
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DELETE 


É o mesmo que RUBOUT. É um comando de 
ção. Não pode ser usado como linha de 
grama. Com o micro no modo de edição , 
mite apagar o caractere à esquerda do 


sor. DELETE encontra-se na tecla SHIFT 


edi 
pro 
per 
cur 
.. 


Para se apagar uma linha inteira de progra 
ma, não é necessário apagar cada um de seus 


caracteres. Digite apenas o número da 
nha e, a seguir, New Line (ENTER). 
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li- 


DIM 


Dimension. É uma instrução. Reserva espaço 
na memória para o uso de variáveis indexa 
das (matrizes). É usada na inicialização. 
Apaga todos os valores das variáveis,se an 
teriormente dimensionadas. 


O basic Sinclair possui matrizes multidi 
mensionais: 


. numéricas - de A(N) a Z(N) - subs — 
critos iniciando-se eml. 


- alfanuméricas - de A$(N) a Z$(N) - subs 
critos iniciando-se em 1. 


Por exemplo: DIM A(19) inicializa uma ma 
triz de nome A com 19 elemen 
tos.Ou seja, existem 10 variá 
veis subscritas a A, denomina 
das A(1), A(2), A(3),A(4) ... 
A(IG). 


Exemplos de programa com uma Matriz para 
1f valores: 


DIM A(1Q) 

FOR N=1 TO 10 
PRINT N 

INPUT A(N) 
PRINT A(N) 
NEXT N 


34 


Exemplo de Programa com uma matriz numéri 
ca bidimensional para 12 valores: 


DIM A(3,4) 
FOR N=1 TO 3 
FOR X=1 TO 4 
INPUT A (N,X) 
PRINT A (N,X) 
NEXT X 

NEXT N 


DIM A(3,4) dimensiona as 12 variáveis: 


A (1,1) A(1,2) A(1,3) A(1,4) 
A (2,1) A(2,2) A(2,3) A(2,4) 
A (3,1) A(3,2) A(3,3) A(3,4) 


Para matriz alfanumérica, proceda como pa 
ra as variáveis alfanuméricas. Apenas 
use o caractere $ a seguir da letra de de 
signação da mesma. 


CONSUMO DE MEMÓRIA NA ÁREA DAS VARIÁVEIS 


Matrizes numéricas custam 4 bytes mais du- 
as vezes a quantidade de dimensões , mais 
cinco vezes o número de elementos.Exemplos: 


A(190) custa 4 + 221 + 52100 = 506 bytes 
A(100,7) custa 4 + 222 + 5210027=3568 bytes 
A(100,5,7)custa 4+223+521002527=1751G bytes. 
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Matrizes alfanuméricas custam 4 bytes mais 
duas vezes o número de dimensões mais a 
quantidade de caracteres. Exemplos: 


A$ (100) custa 4 + 2x1 + 100 = 106 bytes. 
A$ (5,100) custa 4+222+52100 = 508 bytes. 
A$ (190,5,7)custa 4+223+1002527=3510 bytes. 
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EDIT 


Um dos pontos altos do Basic Sinclair, são 
as facilidades de edição, em muito superi 
ores a outros micros de maior porte. 


A tela do micro está composta de 24 linhas 
de 32 caracteres cada, ficando as duas in 
feriores reservadas para edição. 


As facilidades de edição são: 


A. Para alterar a linha em edição. 
Pode-se alterar a posição do cursor por 
SHIFT 5 ou SHIFT 8. Para inserir carac 
teres ou palavras chave, apenas digite 
o desejado e será inserido a esquerda 
do cursor. Para apagar à esquerda do cur 
sor use SHIFT O (DELETE). 


B. Para alterar uma linha da listagem. 
Desloque o cursor existente entre o nú 
mero da linha e as palavras chave até a 
linha desejada por SHIFT 7 ou SHIFT 6, 
ou use LIST N, onde N é o número da li 
nha desejada. Para colocá-la no modo de 
edição, use EDIT por SHIFT 1. 


O micro sempre estará no modo de EDIÇÃO,ex 
ceto durante RUN. 


Veja RUBOUT/DELETE, New Line, LIST ectsS. 
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EXP 


Exponential é uma função. Calcula e”, onde 
X é o argumento dado. A função EXP é o in 
verso de LN. EXP sempre retorna um número 
positivo. 


10 PRINT EXP (3.3) é igual ou semelhante a: 
10 PRINT (2.7182818 * * 3.3) 


Programa para plotar a função EXP: 


10 LET A=-4 
20 FOR N=2 TO 62 

30 PLOT N, INT(EXP(A)25+2) 
40 LET A=A+Q.1 

50 NEXT N 





Observação: 


e=2.7182818 
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FAST 


Os microcomputadores, baseados no sistema o 
peracional do ZX81, possuem duas velocida 
des de operação: FAST e SLOW. 


Quando o micro é ligado, encontra-se no mo 
do SLOW. Isto é, o Display File é constan- 
temente enviado à tela de TV. O comando 
FAST muda para o modo FAST. Neste modo, o 
processamento é que é feito constantemente y 


sendo o D.file enviado à TV somente duran 
te as instruções INPUT, PAUSE ou , quando 


não houver alguma coisa a ser executada.Is 
to significa que, durante o"processamentoY 
a tela ficará “em branco". 


No modo FAST a execução é cerca de quatro 
vezes mais rápida que no modo SLOW. 


Observação: 


Os microcomputadores NEZ8000 e alguns TK8B2C 
so operam no modo FAST, por diferenças de 
hardware, apesar de possuirem o mesmo sis 
tema operacional. 


FAST e SLOW não alteram a velocidade de 
processamento (da CPU). 


veja SLOW. 
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FOR 


É uma instrução usada na definição de 
loops" e requer o uso em conjunto de TO e 
NEXT. 


Exemplo de LOOPING: 


10 FOR N=1 TO 19 
20 PRINT N 
30 NEXT N 


A variável N, utilizada no exemplo , é a 
chamada variavel de controle. 


Quando a linha 19 for executada, N assumi 
rá o valor inicial UM e, ao atingir a ins 
trução NEXT N, será incrementada em 1, Se 
o valor atingido for menor que o valor es 
pecificado após o TO, o programa volta a 
linha seguinte à instrução FOR ... TO.Caso 
contrário, continua apos o NEXT. 


O exemplo acima é o mesmo que: 


19 LET N=1 

20 PRINT N 

30 LET N=N + 1 

40 IF N< 11 THEN GOTO 20 


veja STEP. 
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FUNCTION 


É um comando do sistema. Comuta o teclado 
para o modo [ |, por SHIFT FUNCTION. Uma 
vez acessada uma única função,na forma KEY 
WORD, o cursor volta ao modo D . 


As funções do cursor [E , modo FUNCTION , 
são todas as palavras-chaves estampadas lo 
go abaixo de cada uma das teclas. 


Veja as Funções do Basic Sinclair, no ini 
cio deste volume. 


Observação: 


No CP 200 as funções estão acima das teclas. 
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GOSUB 


Instrução de desvio de programa, para uma 
sub-rotina indicada, a ser terminada por 
RETURN. Por exemplo: 


10 INPUT x$ 
20 GOSUB 190 
30 STOP 

40 PRINT x$ 
100 PRINT x$ 
110 RETURN 


O número de linha de destino, indicado a 
seguir de GOSUB, pode ser indicado por uma 
variável ou sentença matemática. Caso a li 
nha de número indicado não exista, o pro 
grama continua no número de linha subse 
quente à indicada. = 


Veja GOTO. 
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GOTO 


Inicia, reinicia ou desvia a execução 


do 


programa para a linha de número especifica 
do a seguir da mesma, sem alterar as varia 


veis. 


O número de linha de destino pode ser indi 
cado por uma variável ou sentença matemati 


ca. Caso a linha de número indicado não 


e 


xista, o programa continua na linha subse 


quente à indicada. 


Exemplos de GOTO: 
GoTo 109 
GOTO N 
GOTO 100 «x N 


A instrução GOTO pode ser condicionada 
lo uso de IF ... THEN GOTO ... 
Por exemplo: IF IDADE > 8 THEN GOTO 9447 


Substituindo ON ... GOTO inexistente 
Basic Sinclair: 


10 PRINT "OPÇÕES DO MENU" 
20 PRINT"DIGITE DE 1 A 5" 
30 INPUT A 

40 GOTO A 2 100 + 1900 


no 


As respostas do menu, de 1 a 5, desviarão 
o programa para as linhas 1100, 1200,1309, 


1400 e 1500 respectivamente. 
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GRAPHICS 


É um dos modos do teclado/cursor. Digitan- 
do-se SHIFT 9, o cursor muda para M, fi 
cando disponíveis os caracteres gráficos. 


Ou seja, o inverso de todos os caracteres 
e símbolos (excluindo Keywords), acessados 
diretamente e vinte símbolos gráficos com 
acesso por SHIFT, tudo com o cursor em EH. 


Os símbolos gráficos estão ilustrados a se 
guir, com seus códigos e suas teclas de lo 
calização. 
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síMBOLO cóbIGo Modo 


FE FREE Sl] 





Dou 
Espaço 


B 
Shifted 
B 
Shifted 


B 
Shifted 


B 
Shifted 


Shifted 


B 
Shifted 


B 
Shifted 


B 
Shifted 
B 
Shifted 


B 
Shifted 


o 


LIBRE RE 


n 


> = 


E] a 


m 
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o 


CODIGO MoDO 


128 


129 


130 


131 


132 


133 


134 


135 


136 


137 


138 


B 
Espaço 


B 
Shifted 


B 
Shifted 


B 
Shifted 


B 
Shifted 


B 
Shifted 


B 
Shifted 


B 
Shifted 


B 
Shifted 
B 
Shifted 


B 
Shifted 


IF 


É uma instrução que permite ao programador 
executar uma tomada de decisão. É uma das 
mais importantes do Basic. Deve ser usada 
na forma: 


IF CONDIÇÃO THEN INSTRUÇÃO, traduzindo-se: 


SE a condição for satisfeita, ENTÃO execu- 
te a instrução determinada. 


A instrução a seguir do THEN pode ser qual 
quer uma, inclusive outro IF. 


Exemplo: 


10 PRINT "SUA IDADE ?" 

20 INPUT x 

39 CLS 

40 IF X>=18 THEN GOTO 109 
50 PRINT "VOCE EH MENOR" 
60 GOTO 10 

190 PRINT "VOCE EH MAIOR" 
119 GOTO 19 


Veja um exemplo de FOR...NEXT com IF...THEN. 
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INKEY$ 


INKEY$ é uma função. Le o valor do teclado, 
ou melhor, da tecla digitada, quando é exe 
cutada . Quando nenhuma tecla for pressio 
nada, retorna STRING NULA, = "tt, 


Com tecla pressionada ou não, o microcompu 
tador continua a execução do programa. 


Caso se deseje aguardar que uma tecla seja 
pressionada, deve-se colocar o INKEY$ no in- 
terior de um looping. Por exemplo: 


5 LET Tal 
10 SLOW 
20 PRINT "DIGITE UMA TECLA PARA STOP" 
30 LET X$ = INKEY$ 
40 IF X$ = "" THEN GOTO 89 
50 PRINT x$ 
60 LET T = T+1 
70 PRINT AT 20,0; T 
89 GOTO 29 


Para se manter algo impresso no vídeo, du 
rante o looping com INKEY$, é preciso que 
o microcomputador esteja no modo SLOW. 


Os microcomputadores TKBO, NEZB9, NEZBUDO 
e os primeiros TK82C não possuem SLOWe pa 
ra o uso de INKEY$ existe o seguinte mace- 
te: 
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19 
29 
30 
40 
59 


o uso 


FAST 

PRINT "DIGITE UMA TECLA” 
RAND USR 681 

LET X$ = INKEY$ 

PRINT x$ 


de USR 681 pelas linhas 30 e 40 sig 


nifica o mesmo que INPUT INKEY$. É INKEY$ 
"parado", 


Vide SLOW e FAST. 
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INPUT 


A instrução INPUT interrompe a execução do 
programa para uma entrada de dados via te 
clado. A entrada de dados é sempre termina 
da por NEW LINE/ENTER. 


Durante as instruções INPUT, mesmo no modo 
FAST, o DFILE é apresentado no vídeo, por 
que a execução do programa foi parada. 


Os dados a serem entrados podem ser valo 
res numéricos ou alfanuméricos, sendo colo 
cados como variáveis do tipo X, X$ ou subs 
critas. 


Podemos dizer que. de um certo modo, a ins 
trução INPUT define variáveis pela entrada 
de dados do teclado. 


Possibilidades de INPUT : 
A. INPUT X 


INPUT X ou INPUT variável numérica de 
qualquer nome permitido,entra, ag” Yalor 

érico qualquer entre -3x10º a -7 «x 
10” ,ou o nome de uma variável. 


Neste caso, quando o microcomputador pa 
rar para o INPUT, será apresentado no 
vídeo o cursor 5. 
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Se você desejar parar a execução do pro 
grama, digite qualquer letra e NEW LINE 
ou use STOP. 


B. INPUT x$ 


INPUT X$ ou INPUT variável alfanumérica 
de qualquer nome permitido 


Neste caso, quando o microcomputador pa 
rar , para o INPUT, será mostrado o cur 
sor entre aspas, Se você desejar parar 
a execução do programa, não adiantará 
usar STOP, a menos que, antes, você apa 
gue uma das aspas. 


C. INPUT X(X,...,Z) e INPUT X$(Y,...,Z) 


Permitem a entrada de variável numérica 
ou alfanumérica subscrita (ou indexada) 
de uma ou mais dimensões, mas um único 
elemento por vez, desde que anteriormen 
te dimensionada. 


Experimente: 


19 LET A=19 

20 PRINT "A=";A 
30 INPUT A 

40 SCROLL 

59 GOTO 15 


veja DIM. 
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INT 


É uma função. Retorna a parte inteira do nú 
mero dado como argumento. 


Por exemplo: 


PRINT INT 3.1 resulta em 3 e 
PRINT INT 3.6 também resulta em 3. 


Para fazer aproximações aritméticas do tipo 
3.153 e 3.654, utilize a regra: 


LET X=INT(X+9.5) 
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LEN 


Função para manipulação de strings. 


O comprimento de uma determinada string po 
de ser obtido por LEN. 


LEN A$ fornece o número de caracteres da 
string AS. 


String nula retorna LEN O . Por exemplo: 





LET A$ =" e 
PRINT LEN A$ resulta em OD. 
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LET 


A instrução LET define um valor para uma 
variável. Trabalha com variáveis numéricas 
e alfanuméricas, indexadas ou não. Também 
define uma variável, por outra variável já 
definida. 


Nenhuma variável pode ser usada , a menos 
que anteriormente definida por LET, INPUT, 
ou por DIM no caso de subscritas. 


Possibilidades de uso de LET: 


dq LET = Y 


Define X como sendo igual a Y. 

Y pode ser um número, variável, ou o resul 
tado de expressão a ser calculada , mesmo 
que envolva números e variáveis. 


Exemplos: 


LET X = 0 

LET X = A 

LET X=A+1 

LET X =X + A 
LET X = 22(X+A)J+A 


X e Y também podem ser variáveis indexadas 
do tipo X(1), ou multidimensional X(1,1). 
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2. LET X$ = Y$ 
Define X$ como igual a Y$. 


Y$ pode ser uma string, uma variável alfa 
numérica, ou resultado de uma operação com 
strings. 


Exemplos: 


LET X$ = "TESTE 

LET X$ = Y$ 

LET X$ = Y$ + "TESTE 
LET X$ = x + Y$ 


x$ também pode ser uma variável indexada. 
3. LET X$ (N) = Y$ 

Torna o caractere N da string X$ igualaY& 
Por exemplo: 


10 LET X$ = "ABCDF” 
20 LET Y$ = xr 

30 LET x$(2) = Y$ 
40 PRINT x$ 


Resulta em AXCDEF. 
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4. LET X$ (2 TO 4) = Y$ 


Neste caso, Y$ deve ter 4 caracteres, os 
quais assumirão a string X$, do 2º ao 4º 
caractere . 


Por exemplo: 


19 LET X$ = "ABCDEFG" 
20 LET Y$ = "xxx" 

30 LET X$ (2 TO 4) = Y$ 
40 PRINT Xx$ 


Retorna AXXXEFG. 
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LIST 


LIST é um comando do sistema. Permite lis 
tar o programa no vídeo, do início, ou a 
partir da linha especificada. 


LIST lista o programa a partir da primeira 
linha e pára com o código 5/ ou 4/, se hou 
ver um esgotamento do vídeo. Digite CONT e 
NEW LINE. 


LIST n lista o programa, a partir da linha 
de número indicado ou subsequente, no caso 
da inexistência desta. LIST n também deslo 
ca o cursor para a linha indicada, alteran 
do a variável do sistema "current line". 
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LLIST 


LLIST é uma instrução. Funciona igualmente 
a LIST, sendo a listagem do programa envia 
da à impressora, ao invés de ao vídeo. 


LLIST lista o programa todo. 
LLIST 100 lista a partir a linha 100. 


Veja COPY e LPRINT. 
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LN 


É uma função que retorna o logarítimo natu 
ral do argumento X. 


Observação: 
LN (X) = Log e (X) e = 2,7182818 


Note que o logarítimo comum: 
log 19 (X) = (Ln(X))/(LN 10) 


A função LN é o inverso de EXP e,portanto, 
se: 


EXP (X) = Y então 
(X) = LN(Y) 


LN(Y) é o logarítimo natural de Y. O anti- 
log é EXP(LN(Y)). 


Programa para plotar a função LN: 
10 FOR X =. 5 TO 30 STEP.5 


20 PLOT X 4 2, INT(LN X 4 10) 
30 NEXT X 
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LOAD 


O comando LOAD é usado para carregar no mi 
crocomputador os programas previamente gra 
vados em cassete. 


Usado na forma: 


LOAD "t 
carrega o primeiro programa do cassete. 


Na forma: 
LOAD "NOME XY"! 
carrega o programa de nome indicado. 


Procedimentos: 


Ligue primeiramente o gravador, depois acio 
ne NEW LINE ou ENTER. 


Após carregar o programa, na maioria dos 
casos, o microcomputador pára com o código 
de reportagem 9/8. 


Caso a gravação do programa tenha sido fei 
ta no modo RUN, o programa sairá rodando, 
Para carregar gravações deste tipo e faze- 
las parar imediatamente, apos a carga,use: 
FAST e RAND USR 836. 


No vídeo serão reproduzidos dois tipos de 
imagem : um., durante o vazio da fita , en 
tre programas e outro do sinal do programa. 
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É importante saber distinguir, no vídeo, a 
imagem de uma boa gravação. 


so 


LPRINT 


A instrução LPRINT é semelhante a PRINT, 
sô que a impressão é executada na impresso 
ra, ao invés de no vídeo, 


Assim como PRINT permite o uso de vírgula, 
ponto e vírgula e TAB, LPRINT AT interpre- 
ta apenas o número da coluna, sendo ignora 
do o número de linha, porque a impressora 
nao pode retroceder o papel. 


O comando BREAK interrompe a execução de L 
PRINT. 


Se executar LPRINT sem a impressora e a te 
la ficar branca, também use BREAK. 


As instruções LPRINT não são executadas di 
retamente. Um Buffer existente na RAM, nos 
endereços 16444 a 16472, armazena 32 carac 
teres que serão enviados à impressora, so 
mente em um dos casos: 


1. Quando o Buffer estiver completo, com 
uma linha de 32 caracteres. 

2. Após as instruções LPRINT, não termina- 
das com vírgula, ou ponto e vírgula. 

3. Quando a função TAB, ou caractere de 
controle vírgula, exigir uma nova linha. 

4. Ao término do programa, se ficou alguma 
coisa a ser impressa, mesmo que não se 
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ja uma linha completa. 


Programa exemplo da existência do Buffer: 


10 
15 


20 


25 
34 


ERROS 


LPRINT "TESTE"; 

LPRINT "DO BUFFER", 

PRINT "O PROGRAMA CONTINUOU E A 
LINHA NÃO FOI IMPRESSA" 

PAUSE 594 

PRINT "O PROGRAMA ACABOU, E O BUFFER 
", "EH ENVIADO A IMPRESSORA" 


DE LPRINT: 


gom números fracionários, menores que 0,01 


Teste: 


19 
20 


LET X = q.9901 
LPRINT X 


resulta em .OXY1 


Para corrigir use: 


19 
20 
30 


LET X = 0.0001 
LET X$ = STR$ X 
LPRINT X$ 


Vide COPY e LLIST. 
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NEW 


O comando NEW apaga o programa, as 


variá 
veis e limpa a tela. 


NEW apaga a memoria dos endereços de 16509 
até o dado pela variável do sistema opera- 
cional, denominada RAMTOP. 
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NEW LINE 


É um comando do sistema . Deve ser usado: 
1. Ao final de um comando direto. 

2. Ao final de uma instrução de programa. 
3. Ao final de uma entrada de dados. 


Em todos os casos, após New Line, o micro 
verifica a validade da instrução ou dado en 
trado, executando-o ou retornando com o cê 
digo de erro. 
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NOT 


NOT é um operador lógico. É uma negação ló 
gica de números, expressões e strings. 


O valor lógico de uma expressão é interpre 
tado somente com duas possibilidades: 


VERDADE =1= Expressão de valor é O 
FALSO =D= Expressão de valor = O 


Exemplos de uso de NOT: 
1. Como operador numérico: 
10 LET A = NOT B 


Se B não for O, então A assume valor O . 
Se B for 9 , então A assume valor 1. 


É o mesmo que: 


19 LET A = O 
15 IF B = O THEN LET X = 1 


NOT trata o operando B, como um valor logi 
co do tipo 9 ou 1 e então a expressão assu 
me o valor lógico oposto. 


2. Com strings (negando a igualdade) 
10 IF NOT A$=B$ THEN PRINT "DIFERENTE" 
É o mesmo que: 


10 IF A$<>B$ THEN PRINT "DIFERENTE" 
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OR 


OR é um operador lógico. Combina por lógi 
ca“OR“números, expressões ou strings.Permi 
te ainda combinar instruções condicionais, 
oferecendo possibilidades de decisões mais 
complexas. 


O valor lógico de uma expressão é interpre 
tado somente duas possibilidades: 


VERDADE = 1 = expressão de valor é b 
FALSO = 0 = expressão de valor = O 


Combinando-se duas expressões, denominadas 
Ae B por lógica OR, teremos os seguintes 
resultados, em função das condições A e B: 


A B Ao B 


<<mnm 
<n<m 
<<<m 


As possibilidades de uso do operador OR 
são: 


1. Operador Numérico 
LET X=3 OR Y 
Significa que, se Y for O, então X assumirá 
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valor 3 . Caso Y seja diferente de D,então 
X assumirá valor 1. 


LET X = 3 0RY é o mesmo que 
LET X=1 
IF Y = O THENLETX=3 


No Basic Sinclair, somente o segundo ope 
rando é tratado como um valor lógico do ti 
po D ou 1. 


2. Em expressões e,em especial, combinando 
condicionais com IF com números e strings. 


IF X$ = "PRETO" OR X$ = "MARRON" THEN 
PRINT "COR ESCURA" 


veja AND e NOT. 
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PAUSE N 


É uma instrução.Pára o programa por umcer 
to período de tempo especificado. PAUSE N 
pára o programa por N/60 segundos. 


O valor máximo admissível de PAUSE é 32767. 
= 9 minutos. 

Valores maiores equivalem à PAUSE perma 
nente. Durante uma PAUSE, pressionando-se 
qualquer tecla, o programa continua. 


Programa exemplo: 


19 SLOW 

20 PRINT "QUANTOS SEGUNDOS DE PAUSE?" 
30 INPUT X 

40 PAUSE X « 60 

50 PRINT "JAH SE FORAM"; X ; "SEGUNDOS" 


Teste: 
10 PRINT "DIGITE UMA TECLA” 
20 PAUSE 40009 
30 PRINT “FIM”, 


Mesmo no modo SLOW, quando executando PAUSE, 
o vídeo "da uma piscada”". 
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PEEK 


PEEK é uma função do sistema. Retorna o 
conteúdo de um especificado endereço da me 
mória. 


O valor máximo retornável por PEEK é 255, 
porque o microcomputador é baseado no ZB0, 
um microprocessador de 8 bits. Assim, toda 
a memória do sistema foi organizada em bytes 
de 8 bits. A cada byte corresponde um ende 
reço. Bit significa (Binary Digit), dígito 
binário. Em 8 bits só é possível represen 
tar de O a 255 decimal. Valores maiores re 
querem mais de 1 byte ou endereço,para sua 
representação. 


Usando PEEK, você poderá ler qualquer ende 
reço da memoria (ROM e RAM). 


Exemplo: 


10 FOR N=0 TO 8191 

20 PRINT AT 20,0; N, PEEK N 
39 SCROLL 

40 NEXT N 


Para ler valores armazenados em dois ende- 
reços, como os de algumas variáveis do sis 
tema, deve-se multiplicar o conteúdo do en 
dereço mais alto por 256 e somá-lo ao do an 
terior. 
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Por exemplo: 
Variável RAM TOP, endereços 16388 e 16389, 


usa-se: 
PRINT PEEK 16388 + 256 s PEEK 16389. 


Em dois bytes o valor maximo admissível é 
65535. 
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PI 


PI é uma função. Não requer argumento. Re 
torna o valor 3,141592653. O valor é arma 
zenado em 10 dígitos, mas imprime no vídeo 
apenas 8, 


Para converter graus em radianos, use: 


10 INPUT GRAUS 
20 PRINT GRAUS 2 PI/189 
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PLOT 


É uma instrução. 
As posições de PLOT vao de D,0 a 63,43. 


Note que PLOT X,Y significa que Xé posição 
horizontal e Y vertical. O contrário de 
PRINT AT X,Y onde X é linha (posição verti 
cal) e Y é coluna (posição horizontal). 


A seguir, programa para preencher todas as 
posições de PLOT: 


95 SLOW 

10 FORN = 0 TO 63 
20 FOR X = 0 TO 43 
30 PLOT N,X 

49 NEXT X 

50 NEXT N 


Altere: 


19 FOR N = O TO 63 STEP 2 
20 FOR X = O TO 43 STEP 2 


Veja UNPLOT. 
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POKE 


É uma instrução. Armazena o valor dado no 
endereço especificado. Por exemplo: 


POKE 16515,0 armazena o valor 9 no ende 
reço 16515. 


Existem basicamente dois tipos de memória em 
seu micro. ROM e RAM. A ROM é inalterável. 


Os endereços de RAM iniciam-se em 16384 e vão: 


para 2K de RAM de 16384 a 18431 
para 16K de RAM, de 16384 a 32767 
para 48K de RAM, de 16384 a 65535 


Todavia, você não pode aplicar POKE ândis 
criminadamente, em qualquer endereço, porque 
na RAM estão armazenados vários itens,como: 


. as variáveis do sistema 

- o programa do usuário 

. as variáveis do programa usuário 

- D.FILE (memória de vídeo) 

» Stack do calculador, da máquina , etc... 


POKE ENDEREÇO, VALOR 


Aceita endereços de & a 65535 ou retorna có 
digo de erro B/ . 


Aceita valores de -255 a +255. Se o número 
for negativo, o micro irá somá-lo a 256,an- 
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tes de armazená-lo. Números fora desta fai 
xa retornam codigo de erro B/ . 


Você pode aplicar POKE nos endereços da ROM, 
mas não terá efeito algum. 


Alguns exemplos de POKE: 


A. 
61 REM XXXXXXXXXXxX 
19 FOR N = 1 TO 19 
20 INPUT x$ 
30 POKE N, CODE x$ 
40 PRINT x$ 
50 NEXT N 
69 CLS 
70 LIST 


05 REM VÍDEO DE 24 LINHAS 
10 POKE 16418,0 

20 FORN =D TO 23 

30 PRINT, N 

40 NEXT N 


1 REM TESTE 
POKE 16510,0 para transformar a linha 
1 emp. 


74 


PRINT 


É uma instrução. Envia ao vídeo um caracte 
re ou conjunto de caracteres. Oferece as 
seguintes possibilidades: 


a. PRINT: Imprime uma linha em bran 
co. 


b. PRINT NouN$:Imprime variáveis e constan 
tes numéricas. 


c. PRINT "XYZ": Imprime cadeia de caracte- 
res. 


Para cada linha de PRINT terminada por NEW 
LINE ou ENTER, como nos modelos acima,a po 
sição de impressão é sempre deslocada para 
a linha seguinte. Por exemplo: 


10 PRINT "TESTE" 
20 PRINT "TESTADO" 
39 PRINT 

40 PRINT "FIM" 
resultará em: 


TESTE 
TESTADO 


FIM 


Em conjunto com a instrução PRINT, usam-se 
os caracteres de controle (de impressão) , 
(vírgula) e ; (ponto e vírgula), com o ob 
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jetivo de se continuar a impressão sem mu 
dar de linha. 


As instruções PRINT, quando terminadas por 
; (ponto e vírgula), fazem com que a proóxi 
ma impressão seja a seguir da última. 
Exemplo: 


10 PRINT "TESTE " ; 
20 PRINT "TESTADO" 


resulta em: 
TESTE TESTADO 
Experimente: 


10 FOR N = 1 TO 20 
20 PRINT CHR$ N 
30 NEXT N 


e altere: 
20 PRINT CHR$ N; 


A vírgula desloca a posição de impressão 16 
posições a frente. Teste: 


10 FOR N = 1 TO 20 
20 PRINT N, 
30 NEXT N 


Veja o efeito de: 


10 PRINT "TESTE", "TESTADO" 
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o mesmo que: 


10 PRINT "TESTE", 
20 PRINT "TESTADO" 


Ainda em auxílio das facilidades de impres 
são , o Basic Sinclair oferece as funções 
(de impressão) AT e TAB, respectivamente, 


PRINT ATY,X; e PRINT TAB X; 
onde X é coluna e Y é linha. 


PRINT AT possibilita alterar a posição de 
impressão (PRINT POSITION) para qualquer 
linha e coluna da tela e PRINT TAB permite 
deslocar a impressão X colunas, se exceder 
a linha, desloca para a seguinte. 


Veja AT e TAB. 
A MEMÓRIA DE VÍDEO (D.FILE) 


Tudo que é impresso no vídeo, ou melhor, o 
vídeo como você o vê, com 24 linhas de 32 
caracteres correspondem a 24 x 33 bytes na 
memória de vídeo. Uma linha ocupa 33 bytes, 
sendo 32 para os caracteres e 1 para NEW 
LINE. 


Cada caractere da tela ocupa um determina- 
do byte na memória. Os endereços da memória 
de vídeo variam de tempos em tempos, por 
questões de FIRM e HARDWARE. O endereço de 
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início, ou do primeiro byte da memória de 
vídeo (D.File) é dado pela variável do sis 
tema D.File, endereços 16396 e 16397. 


O D.File começa com o primeiro byte em va 
lor 118 (NEW LINE) e também termina por 118. 


O programa, a seguir, lê os 32 primeiros 
bytes da memória de vídeo e inverte os ca 
racteres, acrescendo 128 aos seus códigos. 


Rode em SLOW; 


10 LET DFILE = PEEK 16396 + 256 2 PEEK 
16397 

20 PRINT "QUALQUER COISA" 

30 REM INVERTER UMA LINHA DO VÍDEO 

40 FOR N=1 TO 32 

50 LET X=PEEK (DFILE + N) 

60 IF X<D118 THEN POKE DFILE+N,X+128 

70 NEXT N 


A posição de impressão, ou endereço da me 
mória de vídeo onde a próxima instrução 
PRINT será aplicada, pode ser identificada 
pela variável do sistema, denominada PRINT 
POSITION ou CC,corrent caracter, endereço 
16398. 


No programa"Fórmula Micro" do livro "30 JO 
GOS PARA TK82 e CP200", de minha autoria,a 
mesma é utilizada, para-saber se a posição 
ondt será impresso o carro" é um vazio(va- 


78 


lor 9),ou se já contém alguma coisa,como a 
murada da pista, indicando , então, a coli 
são. PRINT AT e TAB funcionam pela altera 
ção desta variável. 


As duas linhas inferiores do vídeo são re 
servadas para edição, mas podem ser usadas, 
desde que se altere a variável do sistema, 
do endereço 16418, cujo valor é habitual 
mente 2. Esta alteração, por POKE 16418,0, 
por exemplo, não funciona como comando dire 
to, somente como linha de programa.Experi- 
mente : 


19 POKE 16418,0 

20 FOR N=0 TO 23 

30 PRINT AT N,N;"OkK" 
40 NEXT N 


Observação: 


A variável do endereço 16418 deve voltar ao 
valor 2, antes de qualquer instrução INPUT 
ou para edição. 
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RAND 


Rand é uma palavra-chave, usada como ins 
trução para controlar a aletoriedade de 
RND, iniciando a sequência randômica numa 
posição desconhecida. 


O microcomputador tem uma sequência habitu 
al de 65536 números e RAND Nfaz RND inici 
ar a leitura da sequência, a partir da po 
sição N. 
Teste por: 

19 RAND 7 

20 LET A = 1 

30 PRINT RND 

40 LET A = A+1 


50 IF A<6 THEN GOTO 39 
69 GOTO 19 


Nada randômico. 


so 


REM 


REM. É uma abreviatura de Remarks, observa 
ção. É uma instrução e pode ser seguida de 
quaisquer caracteres imprimíveis. 


Seu único efeito é aparecer na listagem do 
programa. Na execução do mesmo, não tem e 
feito algum. 


Habitualmente é utilizado para identificar 
os programas e/ou suas rotinas. 


81 


RETURN 


É uma instrução de término de sub-rotina. 


Somente é executável, se houver um GOSUB cor 
respondente. Caso contrário, o programa pá 
ra com o codigo de erro 7/ . 


As instruções GOSUB colocam o número da li 
nha seguinte no "GOSUB STACK" e então "pu- 
lam " para a linha especificada ou subse 
quente . Quando uma instrução RETURN é exe 
cutada, o programa desvia-se para a última 
linha, cujo número foi colocado no " GOSUB 
STACK". 


Exemplo de GOSUB 


10 PRINT “DIGITE UM NE] FRACIONÁRIO" 
20 INPUT X 

39 CLS 

40 GOSUB 100 

50 RUN 

100 LET Y = INT (X) 

110 PRINT X, “INT ="; Y 

120 PAUSE 390 

139 CLS 

140 RETURN 


Veja GOSUB e GOTO. 
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RND 


É uma função. Retorna um número pseudo- 
aleatório maior ou igual a zero, mas me 
nor que um. 


É pseudo, porque, na verdade,este número é 
retirado de uma sequência definida. 


Veja o uso de RAND, 


Exemplos para se obter um número pseudo- 
aleatório : 


entre O e 99: 

10 LET X = INT(RND * 199) 
entre OD e 100: 

10 LET X = INT(RND * 191) 
entre 1 e 100: 


10 LET X = INT(RND 2 1960) + 1 
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RUN 


É uma instrução. Apaga as variáveis e roda 
o programa do início, ou, a partir da 1i 
nha indicada ou subsequente. 


Exemplos: 


RUN, apaga as variáveis e roda o progra 
ma do início. 


RUN 100 apaga as variáveis e roda o progra 
ma, a partir da linha 1060, ou se 
guinte, caso esta inexista. 


Para rodar um programa do início, ou reini 
ciá-lo, sem apagar as variáveis, use GOTOn. 
Vide GOTO. 


RUN, como comando direto, apaga o vídeo.Co 
mo linha de programa, não. 
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SAVE 


A instrução SAVE envia o programa e suas 
variáveis,para o casseteaã razão de 250 baud. 


Se uma cópia do programa for feita em cas 
sete, o mesmo poderá ser posteriormente re 
cuperado por LOAD, 


SAVE deve ser usado com uma string de argu 
mento. Por exemplo: 


SAVE"NOME" ou 
SAVE A$ 


Para fazer com que seu programa "saia ro 
dando", após recuperá-lo do cassete, colo 
que SAVE, como a primeira linha do mesmo e 
grave-o por GOTO 1. 


Apôs a gravação, a última letra do nome do 
programa aparecera em caractere inverso. 


Para parar estas gravações,ao invés de car 
regar por LOAD"", use FAST e RAND USR 836. 


A instrução SAVE envia parao cassete todos 
os bytes da RAM do usuário, doinício até o 
último, dado pela variável do sistema, deno 
minada RAMTOP. Os programas gravados com a 
expansão de 16K,só poderão ser carregados 
com 16K de RAM, mesmo que sejam menores que 
1K. 
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Nestes casos, ao invés de remover a expan 
são , é melhor alterar a variável  RAMTOP 
por: 


POKE 16389,72 


que o micro pensarã ter apenas 2K de RAM. 
Este procedimento pode ser adotado também 
para encurtar o tempo de gravação e carga. 


Cálculo aproximado do tempo de gravação em 
segundos é igual ao número de bytes do pro 
grama x 8/250. 


Sequência de SAVE: 


1. Cheque a fita no cassete. 

2. Cheque o cabo de ligação do Micro-Mic a 
ao MIC do cassete. 

3. Ajuste agudos para o máximo e volume pa 
ra 1/4 a 2/4 do máximo. 

4. Verifique o programa e digite SAVE "NO 


MEM. 
5. Digite NEW LINE ou ENTER . 
6. Durante os 5 segundos iniciais a tela 


ficará branca. Neste meio tempo, acione 
o cassete para REC. 


Acionando primeiro o micro e depois o cas 
sete, evita-se a introdução de ruídos no 
início da gravação. A imagem produzida no 
vídeo é proposital e serve para monitorar 
a gravação. 
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SCROLL 


É uma instrução. Desloca todo o Display 
File uma linha acima. A primeira linha é 
perdida e a última linha entra vazia. 


A posição de impressão é deslocada para o 
início da última linha. 


Teste: 


10 INPUT x$ 
20 PRINT x$ 
39 SCROLL 
40 GOTO 10 


Obs : Não funciona com LPRINT. 
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SGN 


SIGNAL é uma função. Retorna 1, se o argu 
mento for positivo; -1, se for negativo e 
D , se ele for 0. 


Programa exemplo: 


05 PRINT AT 20; O; “Nº, "SGN" 
10 FOR N=-3 TO 3 


15 SCROLL 
20 PRINT AT 20; 0; N, SGNN 
25 NEXT N 

Retorna: 

N SGN 
-3 -1 
-2 Sá 
=1 -1 

[) [) 

1 1 

2 1 

3 1 
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SIN 


É uma função. Fornece o seno do ângulo dado, 
em radianos. 


A seguir, programa para plotar a função se- 
no: 


19 FOR N = 0 TO 6 STEP 0.1 


20 PLOT N * 10 + 2, INT(SIN(N)219 + 20 
30 NEXT N 
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SLOW 


Os microcomputadores baseados no sistema 
operacional do ZX81 operam em duas veloci- 
dades. FAST e SLOW. 


Quando o micro é ligado, ele se encontra 
no modo SLOW. É o modo em que o vídeo se a 
presenta continuamente, sem piscar e o pro 
cessamento é feito entre cada imagem vídeo, 
ficando 4 vezes mais lento que no modo 
FAST. 


Jã no modo FAST, o processamento é feito 
ininterruptamente e o vídeo é apresentado 
somente quando este termina, ou durante co 
mandos de INPUT e PAUSE. 


Observação: 


Os microcomputadores NEZ8000 e alguns TK82 
C não possuem o modo SLOW,por diferenças 
de circuito,apesar de teremo mesmo sistema 
operacional. Ou melhor, por serem sucesso- 
res do ZXB0 com a SK ROM do ZX81 e não do 
Zx81. 
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SQR 


SQR é uma função. Significa Square Root 


( 


raiz quadrada) do número dado (n). O inver 


so de raiz quadrada é a multiplicação 
um número por ele mesmo. 


Programa para plotar a SQR de X, com X 
riando de (0 a 60) 2 5 + 2: 


10 FOR X = É TO 60 
20 PLOT X + 2, (SQR X) 2 5 + 2 
30 NEXT X 


Fornece somente as respostas positivas 
não as negativas. Por exemplo: 


"25 tem como resposta 5 e -5, porque 
5x 5=25 e -5 x -5=25 


O Basic Sinclair retorna código de erro 


de 


va 


para SQR de números menores que O (ou nega 


tivos). 
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STEP 


STEP é uma instrução para uso em conjunto 
com FOR ... TO . Veja o uso de FOR...TO. 
NEXT . 





10 FOR N = -5 TO +45 
15 PRINT N 
20 NEXT N 


A variável de controle N é habitualmente 
implementada ou decrescida de 1 em 1.Com o 
uso de STEP é possível alterarmos o valor 
de acréscimo ou decréscimo da variável de 
controle. Por exemplo: 


10 FOR N = -S TO +5 STEP 0.5 
15 PRINT N 
20 NEXT N 


Fará com que a variável de controle seja in 
crementada de 0,5 em 0,5. 
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STOP 


É uma instrução. Pára a execução do progra 
ma com o código de reportagem 9/ . Por 
CONT o programa continua na próxima linha. 


Experimente: 


5 cLs 

10 PRINT "TESTE" 
20 STOP 
39 RUN 


Por RUN retornará 9/20 (codigo de STOP na 
linha 20). 


Digite CONT e NEW LINE. 
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STR$ 


É uma função. Retorna um número dado na 
forma de STRING$. 
Por exemplo: 


5 LET X$ = 1" 

19 INPUT X 

15 LET X$ = X$ + STR$ X 
20 PRINT x$ 

25 SCROLL 

30 GOTO 10 


PRINT X e/ou PRINT STR$ X produzira o mesmo 
efeito. 
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TAB 


É uma função de impressão. Desloca a 
ção de impressão n colunas à frente, 
o máximo de n é 255. Deve 
mai 


posi 
onde 
ser usado na for 


PRINT TAB 10 ; "TESTE" 


ou 


PRINT "TESTE"; TAB 15; "TESTADO" 


veja PRINT, AT e a Memária de Vídeo. 
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TAN 


Função. Fornece a tangente de um angulo,in 
formado em radianos. 


o 
Um radiano equivale a aproximadamente 57 , 
ou mais, precisamente: 


180º = PI radianos 
Programa para plotar a TAN: 


10 FOR X = 6 TO 6 STEP .1 

20 IF ABS (TAN X)<2 THEN PLOT Xa10+2, 
INT (TAN(X)210+20) 

30 NEXT X 


A restrição da linha 20 é devida ao fato 
da TAN de X tender ao infinito, quando X 
for um múltiplo ímpar de PI/2. 
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THEN 


THEN é parte de uma instrução. Deve ser u 
sada em conjunto com IF. (vide IF...THEN). 


Na verdade, THEN apenas comuta o cursor no 
modo [5 para o modo [], a fim de que possa ser 
inserida uma palavra-chave, mais especifi 
camente , uma instrução a seguir da condi 
cional proposta por IF... Por exemplo: 


IF X>109 THEN GOTO 39 

Experimente escrever: 
1 REM REM 

Aparentemente impossível. Digite então: 
1 REM THEN REM 


Retroceda o cursor e apague o THEN. 
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UNPLOT 


É uma instrução. UNPLOT é geralmente usada 
após as instruções PLOT, porque seu único 
efeito é apagar uma posição anteriormente 

“plotada". 


Assim como PLOT, UNPLOT vai de: 


UNPLOT 0,0 a 
UNPLOT 63,43 


Lembre-se de que, para cada posição ou ca 
ractere de PRINT, existem 4 posições para 
PLOT. 


Exemplo: 


10 PRINT “DIGITE A DE O A 63" 
15 INPUT A 

20 PRINT “DIGITE B DE O A 43" 
25 cLs 

30 PLOT A,B 

35 PAUSE 100 

40 UNPLOT A,B 

45 PAUSE 100 

50 RUN 


veja PLOT 
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USR 


É uma função para a chamada de sub-rotinas 
no código da máquina, no endereço dado(n), 
onde n deve ser um inteiro entre O e 65535. 
Número fora dessa faixa retorna código de 
erro B. 


Para a utilização de USRn,é necessário ter 
-se,previamente, escrito a rotina em códi 
go, exceto, quando chamando as da ROM. 


Como USR é uma função, não pode ser usala di 
retamente e sim como argumento de uma ins- 
trução. É válido: 


RAND USR N 
RUN USR N 
LET L=USR N 


etc. ..., e por 


PRINT USR N, quando do retorno ao Basic, 
obtem-se impresso no vídeo 
o valor do register BC. 
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VAL 


Função para a manipulação de STRING$. 


Aplicando-se VAL a uma STRING, retorna uma 
expressão numérica. 


A STRING usada como argumento de VAL deve 
conter somente caracteres numéricos e ope 
radores aritméticos ou lógicos. 


Por exemplo: 
10 PRINT VAL "1+2+3" resulta em 6. 
10 LET x$ ="10" 


20 LET Y$ = "3º 
30 PRINT VAL (X$ + Y$) retorna 13. 


Operações aritméticas são também executáve 
is. Por exemplo: 


10 PRINT VAL "SQR 9” retorna 3 


10 PRINT VAL "ABS-29" retorna 29 
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Convertendo outros Basics 


O "BASIC" é uma linguagem. Uma linguagem 
de programação e que, como toda linguagem, 
possuí inúmeras variações, com poucas ou 
muitas diferenças, variando de computador 
para computador. 

O "BASIC" criado pela Sinclair e utilizado 
pelos micros NEZ8000, CP200, TK82C, TK83 , 
TK85, Ringo e AS1000 é bastante semelhante 
ao "BASIC" "convencional", excluindo-se a 
manipulação de dados, anesar de seu funcio 
namento "sui generis" em relação aos dema 
1s "BASICs". 


A seguir, apresentamos uma relação das 
principais diferenças entre os diferentes 
"BASICs" e o que poderíamos chamar de 
"BASIC ZX" ou "BASIC SINCLAIR". 


NÚMERO DE INSTRUÇÕES POR LINHA 


A maioria dos Basics permite o uso de varias 
instruções por linha, como por exemplo: 


19 LET A=1:LET B=5:LET C=10:PRINT A,B,C 


Neste caso, as instruções foram separadas 
por (:) dois pontos. No BASIC ZX so e per- 
mitádo o uso de uma instrução por linha,co 
mo por exemplo: 
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10 LET A=1 
20 LET B= 
39 LET C=10 

40 PRINT A,B,C 








AS VARIÁVEIS 


A maioria dos BASICs permite a leitura e o 
envio das variáveis, 'subscritas ou não,aos 
periféricos, como: o cassete, oferecendo 
grandes vantagens com o arquivamento de da 
dos nos meios magnéticos. 


No BASIC ZX, as variáveis são gravadas do 
e para o cassete, Juntamente com o progra 
ma, ficando o arquivo de dados limitado a 
capacidade da RAM, menos o consumo do pro- 
grama. 


AS MATRIZES 


Não requerem o uso de CLEAR e/ou DEF. 

O BASIC ZX possui matrizes muldimensionais 
numéricas e alfanuméricas .Os subscritos se 
iniciam em 1. 

Não existe A(D). 


OS NOMES DAS VARIÁVEIS 


No BASIC ZX as variáveis numéricas são de 
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nominadas por qualquer letra, seguida ou 
não de outros caracteres alfanuméricos. As 
variáveis alfanuméricas ou cadeias de carac 
teres são denominadas de A$ até Z$. 


OS NOMES DAS VARIÁVEIS SUBSCRITAS 


As matrizes numéricas podem ser denominadas 
de A azZeas alfanuméricas de A$ a Z$, no 
BASIC ZX. 

A INSTRUÇÃO LET 


A maioria dos BASICs permite a omissão da 
palavra LET, como por exemplo: 


19 A=1 
no BASIC ZX: 


10 LET A=1 


AS INSTRUÇÕES INPUT e PRINT 


Em alguns BASICs a instrução INPUT permite 
a entrada de vários valores simultaneamen- 
te, quando separados por vírgula. Exemplo: 


10 INPUT A,L,P 


Podendo ainda acumular o significado de 
PRINT, se na forma: 


103 


19 INPUT, "ALTURA, LARGURA, PESO" ,A,L,P 


Esta única linha requer 6 linhas no BASIC 
zx. 


19 PRINT “ALTURA” 
11 INPUT A 

12 PRINT "LARGURA" 
13 INPUT L 

14 PRINT "PESO" 

15 INPUT P 


Na maioria dos BASICs, quando a instrução 
PRINT for ocasionar uma sobrecarga ou fal 
ta de espaço no vídeo, este é alterado au- 
tomaticamente por uma função do tipo 
SCROLL, "abrindo" espaço para a nova mensa 
gem. Este tipo de "proteção" não existe no 
BASIC ZX. 


AS INSTRUÇÕES GOTO e GOSUB 


Em alguns BASICs, é obrigatório que, a se- 
guir das instruções GOTO e GOSUB, esteja 
especificado um número de linha e que esta 
exista. 


Nestas instruções, o BASIC ZX é bem versá 
til. Não é obrigatório que a linha de núme 
ro indicado exista. O programa reinicia-se 
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na primeira linha de número subsequente à 
indicada. 

O BASIC ZX permite ainda que a definição do 
número da linha de destino seja feita por 
uma variável ou resultado de operações ma- 
temáticas. Exemplo: 


19 GOTO x 
10 XxA/2 
10 GOSUB X%xA/2 


IF ... THEN 


A maioria dos BASICs permite: 

10 IF...THEN 100 
No BASIC ZX é obrigatório o uso da expres 
são GOTO. Por exemplo: 

19 IF...THEN GOTO 1909 


No BASIC ZX não é obrigatório que a seguir 
de IF...THEN seja especificado um número de 
linha, oferecendo as seguintes possibilida 
des: 


10 IF...THEN PRINT "EUREKA" 
10 IF...THEN LET X=X-1 
10 IF...THEN RUN 

Etc... 
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ON X GOTO, ON X GOSUB 


Encontradas na maioria dos BASICs são ins 
truções de desvio do programa que dependem 
do valor da variável X. Por exemplo: 

19 ON X GOTO 190, 200, 390 fará com que,se 
a variável X assumir o valor 1, o programa 
se desvie para a linha de número 100, se X 
assumir o valor 2 significa GOTO 200 ese xX 
= 3 GOTO 390 . 


No BASIC ZX, equivale a : 
10 IF X=1 THEN GOTO 190 
12 IF X=2 THEN GOTO 200 
14 IF X=3 THEN GOTO 300 


No BASIC Sinclair ou ZX, ON X não existe , 
mas poderíamos usar, por exemplo: 

10 INPUT X 

20 GOTO X « 100 


DATA, READ, RESTORE 


Encontradas na maioriados BASICs, prestam- 
se à manipulação de dados. Exemplo: 
10 DATA 13, 23, 33, 43 


Esta instrução contém os valores 13, 23,33 
e 43 que podem ser lidos ou transferidos 
para uma matriz com o uso de READ.Exemplo: 
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20 FOR N=0 TO 3 
30 READ A(N) 
40 NEXT N 


Apresentamos,a seguir, tres versões para o 
BASIC ZxX. 


10 LET A(1) = 13 
12 LET A(2) = 23 
14 LET A(3) = 33 
16 LET A(4) = 43 


Esta solução custa 25 bytes ,por linha de 
programa. A solução abaixo é bem mais eco- 
nômica em termos de consumo de memória. 


1 REM XXXX (Obrigatoriamente comoprimei 
ra linha). 

POKE 16514,13 

POKE 16515,23 

POKE 16516,33 

POKE 16517,43 

12 FOR N =1TO4 

14 LET A(N) = PEEK(16513+N) 

16 NEXT N 

E esta outra, mais econômica ainda. 


LET A (1) = 13 


LET A (2) = 23 
LET A (3) = 33 
LET A (4) = 43 
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Use os comandos, diretamente, sem número de 
linha. Neste caso, RUN ou CLEAR apaga os va 
lores armazenados. 


RESTORE reinicia as definições das variáveis 
do início. 
LEFT$, MID$, RIGHT$ 


Encontradas na maioria dos BASICs, são ins 
truções para manipulação de cadeias de ca 
racteres. Não são encontradas no BASIC ZX 
e podem ser substituídas, como a seguir: 


LEFT$ (A$,X) fornece os primeiros X carac 
teres de A$. 


Equivale a A$ (TO X) 


RIGHT$ (A$,X) fornece os últimos X caracte 
res de A$. 


Equivale a A$ ((LEN(A$)-X)TO). 


MID$ (A$,A,B) fornece a quantidade B de ca 
racteres da cadeia A$, a partir da posição 
A. Equivale a A$ (A TO (A+B)). 


ASC, CHR$ 


A função ASC encontrada na maioria dos 
BASICs fornece o va-or ou código do pri- 
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meiro caractere de uma cadeia de caracte 
res, de acordo com o ASCII. 


ASC(A$) equivale a CODE (A$), no BASIC ZX. 
É importante notar que os códigos dos carac 
teres ZX não correspondem em nada ao ASCII, 
American Standard Code for Information 
Interchange, utilizado pela maioria dos com 
putadores e periféricos da atualidade. 


A função CHR$, no Basic ZX, não difere em 
nada . 
PONTO FLUTUANTE 


O BASIC ZX armazena números em cingo bytes 
com ponto flutuante. de - 3 X 10 a-7x 
10" com resolução de nove dígitos e meio. 


OUTRAS DIFERENÇAS 


Entre a maioria dos BASICs e o BASIC ZX e- 
xistem outras diferenças, além das aqui re 
lacionadas. 
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Contando os Bytes 


De um modo geral, praticamente todas as 
instruções e funções custam apenas um byte. 
Como a maioria não pode ser usada isolada- 
mente, é preciso considerar argumentos ne- 
cessários ou aplicáveis a cada caso, para 
conhecermos o consumo de memória. 


A seguir, apresentamos algumas possibilida 
des: 


AS LINHAS DO PROGRAMA 


Em uma linha do programa são gastos cinco 
bytes, além do seu conteúdo. Dois são para 
o número de linha, dois para arquivar o 
comprimento da linha em bytes e um para o 
término, dado por NEW LINE. 


1 REM custa 6 bytes. 


OS CARACTERES E PALAVRAS-CHAVE 


Quando usados entre aspas, como parte de 
string, custam definitivamente apenas um 
byte. 


OS SÍMBOLOS MATEMÁTICOS E DE PONTUAÇÃO 


Vezes, mais, menos, divisão, potência, maior, 
menor, parêntese, ponto, ponto e vírgula, 
vírgula custam um byte. A vírgula, como ca 
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ractere de controle de impressão custa de 
sesseis bytes na memória de vídeo. 


AS INSTRUÇÕES 


CLS, CLEAR, CONT, COPY, FAST, SLOW, LLIST, 
LIST, REM, LPRINT, PRINT,RAND,RETURN,STOP, 
SCROLL, etc. ..., custam apenas um byte 

Como linha de programa, custam seis bytes. 


AS INSTRUÇÕES 


LPRINT X, PRINT X, INPUT X, PRINT PI,PRINT 
RND, etc..., custam dois bytes. Como linha 
de programa, custam sete bytes. 


AS INSTRUÇÕES 


LPRINT X$,PRINT CHR$X, INPUT X$,- etc...cus 
tam tres bytes. Como linha de programa, oi 
to bytes. 


AS INSTRUÇÕES LET, NA ÁREA DO PROGRAMA 


LET X = A custa quatro bytes. LET X$ = "tt 
custa seis bytes. 


LET X = O custa dez bytes. LET X = 3+3 cus 
ta dezoito bytes. Como linha de programa 
custa vinte e três bytes. 


AS INSTRUÇÕES PAUSE, GOTO, GOSUB 


Custam dois bytes,se empregadas com varia- 
veis como: 


PAUSE X, GOTO X, GOSUB X 


Custam,pelo menos, oito bytes, se emprega- 
das com constantes numéricas como: 


PAUSE 1, GOTO 1, GOSUB 1, 

ou dez bytes 

PAUSE 199, GOTO 999, GOSUB 100, 
ou quinze bytes 


19 PAUSE 1900 


AS INSTRUÇÕES POKE, PLOT, UNPLOT 


POKE X,Y ou PLOT X,Y custa quatro bytes.No 
entanto, POKE 1,9 ou PLOT 1,0 custa dezes- 
seis bytes. 


19 POKE 16418,19 custa vinte e seis byt 





A CONDICIONAL 


IF A=1 THEN GOTO 1 custa dezenove bytes. 
Possui sete caracteres, ou palavras-chave 
além de duas constantes numéricas que cus 
tam seis bytes cada. 

10 IF A=100 THEN GOTO 9099 custa vinte e no 
ve bytes. 
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A TABULAÇÃO TAB, AT 


PRINT TAB X;N é a possibilidade que apre- 
senta menor consumo de memória. Custa cin 
co bytes e como linha de programa dez bytes. 


10 PRINT TAB 1; "X" custa dezoito bytes. 


Cada posição de impressão ou coluna deslo 
cada pela função TAB irá custar um byte ex 
tra na memória de vídeo. 


10 PRINT AT 0,0; "x" custa vinte e seis 

bytes. 
Cada posição de impressão deslocada irá cus 
tar um byte extra na memória de vídeo. 


AS FUNÇÕES 


ACS, ASIN, ABS, ATN, COS,SQR,INT, LN, TAN, 
etc. ..., custam um byte, mas, como não são 
válidas sem argumento, custam "caro", 


LOOPING 


190 FOR N=1 TO 9 custa vinte e tres bytes. 
10 FOR N=1 TO 1000 custa vinte e seis bytes. 
30 NEXT N custa sete bytes. 

10 FOR N=1 TO 1000 STEP 2 custa trinta e 
quatro bytes. 
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SUBSTRING$ 


10 PRINT A$ custa oito bytes. 

10 PRINT A$ (TO 6) custa dezoito bytes* 

10 PRINT A$ (TO 29) custa dezenove bytes. 
10 PRINT A$ (2T0290)custa vinte e seis bytes. 


AS INSTRUÇÕES DIM, NA ÁREA DO PROGRAMA 


10 DIM A(X) custa dez bytes. 

10 DIM A(X,Y) custa doze bytes. 

190 DIM A(3) custa dezesseis bytes. 

10 DIM A$(3) custa dezessete bytes. 

10 DIM A(100) custa dezoito bytes. 

10 DIM A$( 100) custa dezenove bytes 

10 DIM A(3,3) custa vinte e quatro bytes. 


O consumo de memória, citado acima, não in 
clui a área reservada para os elementos da 
matriz. Vide abaixo. 

AS VARIÁVEIS, NA ÁREA DAS VARIÁVEIS 


As NUMÉRICAS custam cinco bytes, mais o nú 
mero de caracteres do nome. Exemplo: 


LET A=1 custa seis bytes e LET AA=1 custa 
sete bytes. 


As ALFANUMÉRICAS custam tres bytes, mais a 
quantidade de caracteres empregados. 


De CONTROLE , como FOR X-NEXT X custam de- 
zoito bytes. 
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AS VARIÁVEIS SUBSCRITAS, NA ÁREA DAS VARIÁVEIS 


MATRIZES NUMÉRICAS custam quatro bytes, mais 
duas vezes a quantidade de dimensões, mais 
cinco vezes o número de elementos. 
Exemplos: 


A (100) custa 4 + 221 + 52100 = 506 bytes. 
A(100,7) custa 4 + 222 + 5210027=3510 bytes. 
A(100,5,7) custa 4 + 283 + 521002527=17510 bytes. 


MATRIZES ALFANUMÉRICAS custam quatro bytes 
mais duas vezes o número de dimensões, ma 
is a quantidade de caracteres. Exemplo: 


A$ (100) custa 4 + 221 + 100 = 106 bytes. 
A$(5,100) custa 4 + 222 + 52100=508 bytes. 
A$(100,5,7 )custa 4 + 223 + 1002547 =3510 bytes. 
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Economizando Memória 


ol. 


92. 


03. 


4. 


05. 


06. 


D7. 


08. 


Elimine as instruções REM, prefácios ex 
plicativos e linhas que excluam respos 
tas indesejáveis. 


Imprima todas as mensagens e símbolos 
no canto esquerdo da tela. 


Reduza o número de linhas do programa, 
ao mínimo. Cada linha de programa cus 
ta cinco bytes. Dois para armazenar o 
número de linha, dois para o comprimen 
to e um para o termino (New Line). 


Não dimensione matrizes, a menos que 
necessário. 


Elimine os resultados intermediários , 
em cálculos. Por exemplo: A/(BsC), use 
A/B/C. 


Reduza a uma mesma linha todas as ope 
rações aritméticas, relacionais e logi 
cas possíveis. 


Remova IF X = O THEN... e use IF NOT 
X THEN ..., você economiza uma constan 
te numérica, seis bytes. 


Remova IF T > 100 THEN LET T=T + 1 e 
use LET T = T+ (T >109). Na sentença 
matemática se verdadeiro =1, se falso 
=0. 


Remova 


100 IF INKEY$ "MM" THEN LET Y=Y+1 
110 IF INKEY$ = “N" THEN LET Y-1 








e use 


100 LET Y=Y+(1 AND INKEY$ ="M'")-(1 AND 
INKEY$ ="Nº) 
ou 


100 LET Y=Y +(INKEY$ = "M") -(INKEY$ = 
“Nt) y ' 
pelo mesmo principio do item 08. 


09.Use variáveis, ao invés de constantes nu 
méricas, sempre que for repetir um núme 
ro, mais que tres vezes, no programa.Ca 
da constante numérica custa mais seis 
bytes, além dos caracteres mostrados no 
vídeo. Isto porque são sempre seguidas 
do código 126 e outros cinco bytes para 
o valor numérico em si. Isto ocorre da 
mesma forma com valores, como O, 1 ou 
1.3233. 


10.Use os valores das funções e codigos dis 
poníveis, ao inves de introduzir canstan- 
tes numéricas e/ou variaveis. Exemplo: 
LET A=0 ou LET A=1 ocupa dez bytes. 
Use: 
LET AmPI/PI, ou LET A=PI-PI, etc... 
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11. 


12. 


13. 


14. 


Remova 10 LET A=1, 20 LET B=1 e use: 
10 LET A=1, 20 LET B=A. 
Isto economiza seis bytes. 


Dê preferência a PEEK e POKE, para arma 
zenar valores, sempre que possível. 


Transforme as constantes numéricas , se 
forem muitas, em uma só variável literal 
(alfanumérica), isto é,coloque todos os 
caracteres numéricos um ao lado do ou- 
tro, atribua-lhes o nome de uma variável 
literal e passe a manipulá-los,como tal 
Utilize CODE A$ e/ou LET A$(X TO N), pa 
ra recuperar os valores. 


"overlaying'". Você pode sobrepor um pro. 
grama em outro de várias formas, com i- 
númeras vantagens. Por exemplo: use um 
pequeno programa só para definir as va 
riáveis de um programa principal, como 
abaixo: 


10 LET A=1 

12 LET B=2.2 

14 LET SALÁRIO=23568 

16 LET C=12 

Rode"a definição"das variaveis e a se - 
guir apague-a, linha por linha. Os valo 
res permanecerão arquivados,se você não 
usar RUN ou CLEAR. Use GOTO 1. 
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15.Quando arquivando dados, use sempre que 
possível, matrizes alfanuméricas ao in 
vês de numéricas. 


Por exemplo: um gabarito de provas com 
100 questões e 5 alternativas de respos 
ta poderia ser arquivado em uma matriz 
do tipo X(109), sendo que DIM X (100), 
iria custar 506 bytes. 

Usando X$(100), além das 5 alternativas 
de resposta, numéricas, poderíamos ter 
respostas A,B,C,D ou E'e a matriz custa 
ria apenas 106 bytes. 


veja o capítulo "Contando os bytes". 


119 


PUBLICAÇÕES M/CRON ELETRÔNICA 


PARA COMPUTADORES 
sSimclaim* 


SINCLAIR É MARCA REGISTRADA DE SHCLAM RESEARCH LTO 


* DICIONÁRIO DO BASIC SINCLAIR 


Para os micros ZX81, NEZBOOO, CP200, TKB2C é TKBI, TK8S, RINGO,AS 
1000, ate Reune todas as Instruções - Funções - Operadores € 
Caract * exemplificad m ordem alfabética . 
Incluí Otv te Sinclair - Convertendo outros Basica -Con 
tando os Bytes - Economizando Memória. 












* 200 DESENHOS PARA TK E CP200 


to, movimento, ate... 


45 PROGRAMAS PRONTOS PARA RODAR EM TK82C E NE Z8000 


Arquivos - Estoque - Plano Contábil - Folha de Pagamento - Agenda 
Telefônica - Caça ao Pato - Trilha - Jogo da Velha - Forca - Dado 
Tabelas - Tabuadas - Conversão de Coordenadas - Média - Progres- 
são - Tabela Price - Fibonacci - Deprecíação - Renunerador de LL 
nhas em Código - Etc... 











* APLICAÇÕES SÉRIAS PARA TK8S E CP 200 


Quem é Sinclair - Converten: 
Economitando Memória - Flux Down - Erros da 
nhecendo à Impressora - Chaining Programas 
te - Folha de pagamento - Balancete - Corre 
lzado - Das Contribuiç IAPAS - Contas a Rec 
de Clientes - Conta Bancária - Correção de Provas - 
Textos - Estatística - Cus - Orçamento Doi 
enc = ater co 


tes - Contando 





















tico - Rantoper 


* 30 JOGOS PARA TK82 E CP 200 


à - Labirinto - Enterprise - Golfe - Velha - Visita no Castelo 

lota Russa - Corrida de Cavalos - Vinte 4 Un - Cubo da 

gico - Senha - Banco Imobiliário - Forca - Dados - Invasores-etes 
PROGRAMAS NO CÓDIGO OA MÁQUINA 

Inversão de vídeo - Som por Software - Labirinto - Osstrava Soft 

















“CÓDIGO DE MÁQUINA PARA TK E CP 200 


Números Binários « Mexa: 





cimais - Arquitetura do 280 - Editando 
- Programa para Edição - As Instruções do 280 em Exem 
plos - Sub-rotinas da ROM - A ROM de 8X - Dicionário das Instruçõ 
es - MEX X Mnemônicos - Mex X Decimal - Incluindo Programas 
Scroll - Save Otaplay no Ram T 













ombardeio, etc. 


ZX SOFTWARE 


OS QUATRO MELHORES PROGRAMAS EM CÓDIGO, JAMAIS PRODUZIDOS 
PARA UM SINCLAIR EM UM ÚNICO CASSETTE. POR APENAS Cr$ 15.000 


Assembler 


Escreva Os seus programas em código, usando diretamente os menô 
nicos do 280 com este Editor e Monitor de Assembly. Interpreta to 
das as instruções do Z80. Oferece excelentes facilidades de edi 
ção, manipulação do cursor, códigos de erro, entrada de texto, nú 
meros, labels, repetição de tecla, etc... 


Disassembler 


Lê códigos no Assembly do 280. Fornece os endereços em decimal, 
os códigos em hexadecimal seguidos dos memônicos completos. In 
terpreta todas as instruções do 280. 





Compiler 


Transforme instanta 





mente 08 seus programas em Basic em progra 
mas em código, usando o Compiler. Aceita quase todos os comandos 
do Basic Sinclair e passa a rodar os programas até 50 vezes mais 
rápido. 


Monitor 


Programa para estudo de programas em código. Permite listar a Me 
mória, Registers e Flags. Pode-se ainda introduzir Breakpoints, 
converter Hex para Decimal, decimal para Hex etc... 


osstrivuiao vor: /MIICRON ELETRÔNICA 





